home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 February: Tool Chest / Dev.CD Feb 95 / Dev.CD Feb 95.toast / Sample Code / Newton Sample Code 1.2 / Book Maker / Beyond Help-3 / Project Data < prev    next >
Encoding:
Text File  |  1994-07-07  |  377 b   |  21 lines  |  [TEXT/R*ch]
  1. // Copyright © 1993,1994 Apple Computer, Inc. All rights reserved.
  2.  
  3. // app constants
  4. constant kAppMaxWidth := 240 ;
  5. constant kAppMaxHeight := 336 ;
  6.  
  7.  
  8. // read in the book
  9.  
  10. bookFilePath := HOME&"Help Book Source.f" ;
  11.  
  12. // open resource fork for pictures
  13. ref := OpenResFileX(bookFilePath);
  14.  
  15. // load in the book
  16. load(bookFilePath);
  17.  
  18. // close the resource file
  19. CloseResFileX(ref) ;
  20.  
  21.